home *** CD-ROM | disk | FTP | other *** search
/ Power Programmierung / Power-Programmierung (Tewi)(1994).iso / magazine / drdobbs / 1988 / 12 / os2io.asc < prev    next >
Text File  |  1988-12-31  |  5KB  |  184 lines
  1. _WRITING OS/2 APPLICATIONS WITH I/O PRIVILEGES_
  2. by Ray Duncan
  3.  
  4. [EXAMPLE 1]
  5.  
  6.         title   PORTIO.ASM  read/write I/O ports
  7.         page    55,132
  8.         .286
  9.  
  10. ; PORTIO.ASM -- general purpose port read/write
  11. ;               routines for C or MASM programs
  12. ;
  13. ; Copyright (C) 1988 Ray Duncan
  14. ;
  15. ; When this module is linked into a program, the
  16. ; following lines must be present in the program's
  17. ; module definition (.DEF) file:
  18. ;
  19. ; SEGMENTS
  20. ;    IO_TEXT IOPL
  21. ;
  22. ; EXPORTS
  23. ;    rport 1
  24. ;    wport 2
  25. ;
  26. ; The SEGMENT and EXPORT directives are recognized by 
  27. ; the Linker and cause information to be built into
  28. ; the .EXE file header for the OS/2 program loader.
  29. ; The loader is signalled to give I/O privilege to 
  30. ; code executing in the segment IO_TEXT, and to build
  31. ; call gates for the routines 'rport' and 'wport'.
  32.  
  33. IO_TEXT segment word public 'CODE'
  34.         
  35.         assume  cs:IO_TEXT
  36.  
  37.  
  38. ; RPORT: read 8-bit data from I/O port.  Port address 
  39. ; is passed on stack, data is returned in register AX
  40. ; with AH zeroed.  Other registers are unchanged.
  41. ; 
  42. ; C syntax:     unsigned port, data;
  43. ;               data = rport(port);
  44.  
  45.         public  rport
  46. rport   proc    far
  47.  
  48.         push    bp              ; save registers and
  49.         mov     bp,sp           ; set up stack frame
  50.         push    dx
  51.  
  52.         mov     dx,[bp+6]       ; get port number 
  53.         in      al,dx           ; read the port
  54.         xor     ah,ah           ; clear upper 8 bits
  55.                 
  56.         pop     dx              ; restore registers
  57.         pop     bp
  58.  
  59.         ret     2               ; discard parameters,
  60.                                 ; return port data in AX
  61. rport   endp
  62.  
  63.  
  64. ; WPORT: write 8-bit data to I/O port.  Port address and 
  65. ; data are passed on stack.  All registers are unchanged.
  66. ; 
  67. ; C syntax:     unsigned port, data;
  68. ;               wport(port, data);
  69.  
  70.         public  wport
  71. wport   proc    far
  72.  
  73.         push    bp              ; save registers and
  74.         mov     bp,sp           ; set up stack frame
  75.         push    ax
  76.         push    dx
  77.  
  78.         mov     ax,[bp+6]       ; get data to write
  79.         mov     dx,[bp+8]       ; get port number
  80.         out     dx,al           ; write the port
  81.  
  82.         pop     dx              ; restore registers
  83.         pop     ax
  84.         pop     bp
  85.  
  86.         ret     4               ; discard parameters,
  87.                                 ; return nothing
  88. wport   endp
  89.  
  90. IO_TEXT ends
  91.  
  92.         end
  93.  
  94.  
  95. [EXAMPLE 2]
  96.  
  97.  
  98. /*
  99.     PORTS.C:    Demonstration program with IOPL.  
  100.                 Reads and displays the first 256 I/O ports.
  101.                 Requires separate module PORTIO.ASM.
  102.  
  103.     (C) 1988 Ray Duncan
  104.  
  105.     To build:   MASM /Mx PORTIO;
  106.                 CL /c PORTS.C
  107.                 LINK PORTS+PORTIO,PORTS,,,PORTS.DEF
  108.  
  109.     Usage:      PORTS
  110. */
  111.  
  112. #include <stdio.h>
  113.  
  114. #define API extern far pascal
  115.  
  116. unsigned API rport(unsigned);           /* function prototypes */
  117. void     API wport(unsigned, unsigned);
  118. void     API DosSleep(unsigned long);
  119. unsigned API DosPortAccess(unsigned, unsigned, unsigned, unsigned);
  120.  
  121.                                 /* parameters for DosPortAccess */
  122. #define REQUEST 0                       /* request port */
  123. #define RELEASE 1                       /* release port */
  124. #define BPORT   0                       /* beginning port */
  125. #define EPORT   255                     /* ending port */
  126.  
  127. main(int argc, char *argv[])
  128. {
  129.     int i;                              /* scratch variable */
  130.  
  131.                                         /* request port access */
  132.     if(DosPortAccess(0, REQUEST, BPORT, EPORT))
  133.     {   
  134.         printf("\nDosPortAccess failed.\n");
  135.         exit(1);
  136.     }
  137.  
  138.     printf("\n      ");                 /* print title line */
  139.     for(i=0; i<16; i++) printf(" %2X", i);
  140.  
  141.     for(i=BPORT; i<=EPORT; i++)         /* loop through all ports */
  142.     {
  143.         if((i & 0x0f)==0)
  144.         {
  145.             printf("\n%04X  ", i);      /* new line needed */
  146.         }
  147.  
  148.         printf(" %02X", rport(i));      /* read & display port */
  149.     }
  150.                                         /* release port access */
  151.     DosPortAccess(0, RELEASE, BPORT, EPORT);
  152. }
  153.  
  154.  
  155.  
  156. [EXAMPLE 3]
  157.  
  158. NAME PORTS WINDOWCOMPAT
  159.  
  160. PROTMODE
  161.  
  162. SEGMENTS
  163.   IO_TEXT IOPL
  164.  
  165. EXPORTS
  166.   rport 1
  167.   wport 2
  168.  
  169.  
  170.  
  171. [EXAMPLE 4]
  172.  
  173. ports.obj : ports.c
  174.   cl /c ports.c
  175.  
  176. portio.obj : portio.asm
  177.   masm /Mx portio;
  178.  
  179. ports.exe : ports.obj portio.obj ports.def
  180.   link ports+portio,ports,,,ports.def
  181.  
  182.  
  183.  
  184.